n=10;
carpets=[|0,95,65,95|
53,70,53,31|
1,94,27,92|
77,31,60,77|
2,99,5,96|
72,91,21,9|
0,97,22,89|
2,183,100,100|
90,68,59,14|
32,62,17,1|];
loc=[2,183];